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ABSTRACT 



DATAPLOT is used for programming digital incremental plotters 
and consists of a group of relocatable binary subroutines comprising 
a library tape. The subroutines are callable from FORTRAN and are 
used with NOVA computers to drive the Data General incremental 
plotting systems. 
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This revision of the Dataplot manual, 093-000060-01, 
replaces revision 093-000060-00. The only change 
corrects an error on page 6 . The current coordinates 
of the pen when the value of IPEN is are (0, 0) . 
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INTRODUCTION 

DA TAP LOT is a group of relocatable binary subroutines, released in the form 
of a library tape, 099-000021 which can be used to drive the Data General 
incremental plotting systems on NOVA computers. 

lie DATAi LOT si- .alines are written in FORTRAN iY l:\ u Assembly Lan- 
guage. They can be called by any FORTRAN language program, using the FOR- 
TRAN CALL statement. When used in conjunction with Data General digital 
plotters, the subroutines facilitate the production of charts, maps, drawings, 
special curves, and alphabetic characters or symbols. 

DATAPLOT CHARACTERISTICS 

A piot is generated by the operation of the three independent axes X, Y, and Z. 
The chart (X axis) moves bi-directionally under the pen beam; the pen carriage 
(Y axis) moves bi-directionally over the width of the paper's surface; and the 
pen (Z axis) is raised and lowered. 

The plotter is driven in eight basic directions as illustrated in Figure 1. Any 
other motion is achieved by driving the plotter in an appropriate sequence of 

moves involving two or more of the basic directions. 

Accuracy and precision of lines and characters depend upon the size of the pen 
point and the plotter's basic increment size. 
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(-x, +y) 



(-x, -y) 




(+x, +y) 



(+x, -y) 



Figure 1 
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DATAPLOT SUBROUTINES 

There are twelve primary plotter subroutines. 

^" x "" Purpose 



INITAL 



RSTR 



PLOT 



LINE 

WHERE 

MARKER 
SCALE 

PENUP 
PENDN 
SYMBOL 

NUMBER 
AXIS 



Sets up certain constants that are a function of the plotter to 
be used. 

Rpstnrps fh<=> r»lr\H-a-i- «-/-> ^ ^~^;«-;„„ . , 

— ^.^..^0. uw a. puBiuun un a. new page ana positions 
the pen at the bottom of the page. 

Drives the pen from its present position to a new position 
with the pen raised or lowered. 

It is also used to redefine the present position of the pen or to 
locate the present position of the pen. 

Drives the pen through an array of points for point-to-point 
plotting. 

Returns the current pen position coordinates to the calling 
program. 

Draws an event marker at the present pen position. 

Sets and stores scaling information for the AXIS and LINE 
routines. 

Raises the pen. 

Lowers the pen. 

Positions the pen and forms the characters to be plotted. 
(Available character? are 0-9, A-Z,and various special 
characters. ) 

Positions the pen and forms the numerals to be plotted based 
on a real input variable. 

Draws an axis with an identification label and "tic" marks at 
one-inch intervals. 



-3- 



DAT AF LOT SUBROUTINES (Continued) 

INITAL Subroutine 

The INITAL subroutine initializes the plotting routines for the creation d one 
plot or a group of plots by a given program. INITAL must be called only once 
and before any other call to the plotting subroutines is made. 

A call to INITAL also drives the pen down toward the furthest (0, -Y) point 
on the current page. The pen is then positioned one half inch above this point, 
where (X, Y) is defined as (0, 0). 

The call to INITAL has the following format: 



CALL INITAL (IU,IS,W,P) 



where: 

IU - is the logical output device number (unit number 6 for DGC 
FORTRAN) 

IS - is resolution of the plotter in increments per inch. 

W - is the plotter width in inches (Y axis). 

P - is the page length in inches (X axis). 

Example : 



CALL INITAL (6, 100, 11 . 0, 8. 5) 



RSTR Subroutine 

The RSTR subroutine restores the plotter to a position on a new page when a 
new plot is begun and positions the pen at the bottom of the page. 

To use the subroutine correctly, the paper should be aligned initially so that a 
page boundary is directly beneath the pen point. This is useful in multiple 
plots to insure that each of the plots falls on a different sheet (based on the page 
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DATAPLOT SUBROUTINES (Continued) 

RSTR Subroutine (Continued) 

length specified to INITAL). 

The call to RSTR has the following format: 



CALL RSTR 



When the subroutine is called, the paper is indexed to the next unwritten page, the 
pen is positioned one half inch above the extreme (0, -Y) coordinate and this pen 
position is redefined as as (0,0). 

PLOT Subroutine 

PLOT is the subroutine most commonly used by the programmer. PLOT is 
used to drive the pen from its present position to a new position, as specified 
by (X,Y) cartesian coordinates. The coordinates are given in inches. 

In addition, PLOT performs several auxiliary functions that are determined by 
the value of the third argument of the call. 

The call to PLOT has the following format: 



/~< a t t r» t rn 1 f\r -\t Tnn\i\ 



Where: 



X 



IPEN 



is the floating point X coordinate to which the pen is to be 
moved (or the coordinate of the present pen position depending 
upon the value of IPEN). X is the independent variable. 

is the floating point Y coordinate to which the pen is to be moved 
(or the coordinate of the present pen position). Y is the dependent 
variable. 

is a fixed point argument whose sign and magnitude determine the 
functions performed by the subroutine as shown below. 
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DATAPLOT SUBROUTINES (Continued) 
PLOT Subroutine (Continued) 



Value of IPEN 



2 
3 

4 



-1 
-2 
-3 



Action Taken by PLOT 

No plotter movement. The present position of the 
pen is redefined as (0, 0). 

Plotter moves to (X, Y) with the present condition 
of the pen (up or down). 

The pen is dropped: and the plotter moves to (X, Y). 

The pen is raised and the plotter moves to (X, Y). 

There is no plotter movement; the present pen 
coordinates are returned in (X, Y). 

The action of the pen and plotter is the same as for 
the same positive value, but after (X, Y) is reached, 
X and Y are redefined as {$, $). 



Examples: 



CALL PLOT (1.2,3.0,-3) 
CALL PLOT (XI, Yl, 2) 



LINE Subroutine 

LINE is used for point-to-point plotting of graphs, functions, charts, etc. The 
values of X and Y are stored in single subscripted arrays passed to the sub- 
routine. The subroutine can also draw one of five special characters or any 
left justified character at points specified by the programmer in the call. 

The call to LINE has the following format: 



CALL LINE (X,Y,N,KODE,ISPACE) 



DATAPLOT SUBROUTINES (Continued) 
LINE Subroutine (Continued) 

Where: 

X - is a single subscripted array of independent variables. 

Y - is a single subscripted array of dependent variables. 

N - is the number of data points. 

KODE - determines the character that will mark selected points in the 
plot and whether or not lines are drawn from point to point. 
The effect of values of KODE are described below. 

ISPACE - specifies the interval at which the evenly spaced markers (the 

character given by KODE) will be drawn. For example if ISPACE is 
5, symbols will be drawn at the first data point, fifth, tenth, fifteenth, 
etc. The symbols are drawn centered around the data points. 

The value of KODE may be a left-justified character, such as "Z" or "A", 
which is used to mark the points on the plot given by the argument ISPACE. If 
the value of KODE is 0, no character marks the data points. 

If the value of KODE is 1, 2, 3, 4 or 5, special characters are used to mark data 
points. The values 1 through 5 may be signed, where: 

+ - indicates lines will be drawn connecting data points, and 

- - indicates that data points are not connected by lines. 

The special characters are as follows : 

Value of KODE Character on PLOT 



±1 

+2 
+3 
+4 
+5 



X 



DATAPLOT SUBROUTINES (Continued) 



LINE Subroutine (Continued) 



Examples: 



CALL LINE (X.Y.NTOP, -1,5) 
CALL LINE (X,Y,NTOP,0, 1) 
CALL LINE (X,Y,NTOP,"Q",2) 



WHERE Subroutine 

WHERE returns the current pen position coordinates to the two arguments 

of the calling sequence, permitting user-written subroutines to know the current 

pen position for optimizing pen movement. 

The call to WHERE has the format: 



CALL WHERE (X,Y) 



Where: 

X and Y are floating point coordinates to be returned for the present 
pen position. 



Example : 



CALL WHERE (X,Y) 



DATAPLOT SUBROUTINES (Continued) 

MARKER Subroutine 

MARKER is used to write any one of the five special symbols defined for the 
LINE subroutine or any left justified character. MARKER symbols are centered 
The call to marker has the following format: 



CALL MARKER (IMK) 



Where: 

IMK evaluates to a left justified character or to one of the values 
1 through 5 producing the special characters shown below: 



IMK=1 


+ drawn on plot 


IMK=2 


X drawn on plot 


IMK=3 


* drawn on plot 


IMK=4 


# drawn on plot 


IMK=5 


! drawn on plot 


Examples: 




CALL MARKER (1) 


+- + drawn on plot 


CALL MARKER ("A") 


■*- A drawn on plot 
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PENUP Subroutine 



PENUP causes the pen to be lifted. The call to PENUP has the format: 



CALL PENUP 



PENDN Subroutine 



PENDN causes the pen to be lowered. The call to PENDN has the format: 



CALL PENDN 



SYMBOL Subroutine 

SYMBOL is used to generate characters of the alphabet so that plots can be 
annotated. To use the routine, the user must specify the characters to be 
written, the starting location of the characters (X,Y), the height of the charac- 
ters, and the angle at which the characters are to be drawn. With this input 
data, SYMBOL supplies the specific data to the plotter that is needed to draw 
the characters. 

Each character is drawn within a defined region, called a "reference area". 
The dimensions of the characters are based upon the height of the character, 
given by an input argument. The reference point for the reference area is at 
the lower lefthand corner of the reference area for drawing of all characters 
except when a single character is to be drawn. This occurs on calls to LINE 
and MARKER and on a call to SYMBOL when the last argument is -1 or 0. When 
a single character is to be drawn, the reference point is at the center. 

The reference point (X, Y) is the starting position of the pen when drawing a 
character. The width of the reference area and the width of the character are 
calculated from the height (argument HT) as follows: 




.►<X,Y) 

H— w -»i 

*- WRA -j 



T 



HT 



1 



Height = HT 

Width = 5/7 HT 

Width of Reference Area = 6/7 HT 
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SYMBOL Subroutine (Continued) 

The call to SYMBOL has the following format: 



CALL SYMBOL (X, Y, HT, IHOL, THETA, N) 



Where: 



Y anH V 



HI 



IHOL 



THETA 



u^-w^ tut ^uuiuiiictLcs ui uie reierence point. 

specifies the height of the character. The minimum height 
is . 07 inch and the argument must be . 07 or an integer 
multiple of that value. 

is a single subscripted array containing N characters. 
Characters are stored two per word in IHOL. 

specifies the angle in degrees at which characters are to be 
drawn. Although THETA may be given as any angular value, 
characters are only drawn at 90° angles according to the 
table shown below. 



N 



Value of THETA 



0. <A\/rnn^T;;p r rA i&d\ ^a=, 



45.< AMOD( THETA, 360) < 135. 



specifies the number of characters to be drawn. If N = or -1, 
a single character left- justified in IHOL will be drawn. 



Angle 



yj {-ta., + 1) 



90 (-X.+Y) 



Example 



xv n *— 

nDVw 



vj 



135. < AMOD ( THETA, 366) < 225. 



180 (-X.-Y) 



Day 



225. < AMOD (THETA, 360) < 360. 



270 (+X, -Y) 



3> 
O 



Example: 



CALL SYMBOL (0., 8.5, .21, MAB, 0., 12) 
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NUMBER Subroutine 

NUMBER is similar to SYMBOL, except that it is used to specify numbers rather 
than characters. NUMBER formats a floating point number and draws the result- 
ing alphanumeric characters. It establishes the starting location and angle, 
and then draws the required floating point number. The call to NUMBER has the 
following format: 



CALL NUMBER (X, Y, HT, FLT, THETA, N) 



Where: 



X and Y specify the coordinates of the reference point (as in SYMBOL ). 

HT is a signed floating point number. Its magnitude specifies 

the height of the number in inches. The minimum value of 
HT is . 07 and the argument must be an integer multiple of 
. J37. As in SYMBOL, the width of field and the number within 
the field are determined from the height. The sign of HT 
determines whether the output of characters begins or ends 
at (X, Y). If HT is positive, output begins at (X, Y); if negative, 
output terminates at (X, Y). 



FLT 
THETA 



N 



is the floating point number that is to be drawn. 

specifies the angle in degrees at which numbers are to be 
drawn. Numbers can be drawn at 0, 90, 180, 270 degrees 
according to the value specified for THETA, as shown in 
the writeup on SYMBOL. An example of 1. drawn at the four 
possible angles is: ^ 



1-0 



0'1 



is an optionally signed integer. Its magnitude gives the number 
of digits after the decimal point if N is positive. If N=0, output 
terminates at the decimal point. If N= -1, the decimal point 
is suppressed. 



Example : 



CALL NUMBER (-.2, YY, -.14, YFLT, 0.0, 1) 
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AXIS Subroutine 

AXIS is used to generate the axes for a graph. It will draw an axis with a linear 
scale, place tic marks on the axis at one-inch intervals, and label the axis with 
letters and numbers 0. 14 inches high. There are normally two calls for this 
routine per graph, one for the X axis and one for the Y axis. The call to AXIS 
has the following format: 




Where: 



LB1. 



NC 



are the coordinates in inches of the starting point of the axis. 

is a single subscripted array containing the identification label for the 
axis and is approximately centered and written with letters 0.1 4 in. high. 

is a signed integer argument whose magnitude specifies the 
number of characters in LBL. If NC is positive, the scale, 
tic marks, and label are drawn on the counterclockwise 
side of the axis; if NC is negative, they are drawn on the 
clockwise side of the axis. 



specifies the length in inches of the axis. If signed, the 
absolute value of S is taken. 



SMIN 
DS 



is the angle in degrees at which the axis is drawn, where: 

THETA=0. implies a horizontal axis, reading -X to +X. 
THETA=90.implies a vertical axis, reading -Y to +Y. 
THETA=180.implies a horizontal axis, reading +X to -X. 
THETA=27$.implies a vertical axis, reading +Y to -Y. 

is the minimum value sliown on the axis. 

is the scale increment or the increment value per inch on the 
scale. The tic marks are labeled at one-inch intervals with 
values calculated as: 



SMIN, SMIN+DS, SMIN+2DS,.. 



NN 



specifies the number of digits after the decimal point on 
values shown on the axis. A magnitude must be given for NN. 
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AXIS Subroutine (Continued) 



Example: 



CALL AXIS (0.0, 2.0, LAB, -1, 6.0, 0.0, XMIN, DX, 1) 



SCALE Subroutine 



SCALE is used to determine a convenient linear scale based on plot dimensions. 
If data to be plotted does not have a zero base scale or cannot be conveniently 
arranged to fit in a zero base scale, the subroutine will reset the scaling as nec- 
essary. The call to SCALE has the following format: 



CALL SCALE (X, N, S, XMIN, DX) 



Where: 
X 

N 
S 



XMIN 



DX 



is a single subscripted array for which the scale values 
(XMIN and DX) are to be determined. 

is the number of points of X to be scaled. 

is a floating point argument specifying the length in inches of 
the axis against which the data is plotted. The first N X's 
are plotted within a scale length S. 

is computed by SCALE from the first three arguments and is 
the smallest value to be plotted on the axis. 

is computed by SCALE from the first three arguments and takes 
on one of the following values in order to produce a convenient 
scale: 



DX = K*10 



m 



Example : 



where: 



K 



1 



m 



is 1, 2, 4, 5, or 8. 

is the order of magnitude of (XMAX-XMIN)/S, i.e. , 
for the first N X's, X= (X-XMIN)/DX. 



CALL SCALE (IPTS, 100, 8.0, XMIN, DX) 
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LOADING DATAPLQT 

The DATAPLOT library tape is loaded immediately after the FORTRAN main program and 
any FORTRAN subprograms. Loading proceeds as follows: 

1. Load the FORTRAN main program relocatable binary. 

2. Load any FORTRAN subprograms called by the main program. 

3. Load DATAPLOT library tape 099-000021. 

4. Load the FORTRAN library tapes appropriate to the particular NOVA 
configuration. 
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SAMPLE PROGRAM 



Following is a sample FORTRAN main program which calls many of the DATAPLOT 
subroutines. The program generates the function, SIN(X)/X from . 01 to 10. 1/ 

COMMON /TEMPZ/KA8,LAB,MAB, NAB, KAAO, LABEL, ISYM,ISPC 

DIMENSION YC102)#XCi03),KABC7),lABC2)»MABC7),NA6(18),KAADC2) 
DIMENSION LABELC3) 
DIMENSION I3YMC20) 
DIMENSION ISPCC20) 
DATA KAB/4HY ■ , 4HSIN ( , 4HX) /X/ 
DATA LA9/1HX/ 

OATA MAB/4HSAMP,4HLE P,4HL0T / 

OATA NAB/4HGRAP,4HH 0F.4H SIN , 4H (t) / , 4HX FR,4H0M ,,4Htl T, 
1 4H0 1B,4H,1 / 
OATA KAAD/4HTSTI/ 
X2«SQRTC27.0) 
Y3-X2 
X2»3.0 
Xi«6,P 
Yl»«,« 

CALL INITAL(6#1B0,11.»8.5) 

0ELX"P!,1 

XMINM.01 
XMAX"1?),01 

STOP»CXMAX-XMIN)/DELX+0.5 
NT0P"NT0P+1 
XCn»XMlN 
00 391 I»1,NT0P 
YCX)«SXNCX(I))/X(I) 
XfI*l)«XCl3*DELX 
30 CONTINUE 

00 1* I»1 # NT0P 

xcn ■ xcn/2, 

Y(I) ■ YCI)*5. 0+2.0 
5?l CONTINUE 
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SAMPLE PROGRAM (Continued) 



1 /*•'*■ . 3 
' tf * ? , : : 

"-Hi. i.4 

Cai.i PLnrn. •$.!.«, 31 

CH!. PLOT( ■*.»,*. 9. 3) 
Ci LI. Plot (. *,?., 8, pi,?! 



r 



VfJ 



■ • i it r 1 1 , o 

"HI *■ J^T-.^YY.-.M, YFLT,(\fl,l) 
C^Ll Pl„0rr-.1,YY,T) 
^■'Ll *l.nTC*.3,YY,?) 
y / » y y + 1 , i 

^"■LTsVfc-Lr + TY 

C I'TI* >,F- 

CHI A<rS(4.9! f S?,l?l f L *«,-!,* 6^01, pi|g ,5min,ox.i) 

cn i. l i .- erv,v,NTriP,-i,»j^ 

CHI I. t.'-'PfX.Y.MTHP, M) 

C U. I R VMf'L f w . , -, 5, . i a , K- Afl f ,* , , 35) 

" ■» 1 1. *-. :■> T 
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SAMPLE PROGRAM (Continued) 



SAMPLE PLOT 



1-2 -. 



x 



09 
11 

>- 




0-0 _ 



12-0 



GRAPH OF SINCX}/X FROM -01 TO 10-1 
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Following are some sample outputs of DATAPLOT. showing some of the features of 
the program. 



CD CD 
03 CD 



T 


j- 


<M, 


, CJ 


1— •*" 


— *j— 


cn® 


®cn 


u 


LJ 


l 


■ 


f 


r^ 


c/> 


en 


<—cu 


CJ*- 


X-* 


^X 


<n .- 


- .<E 


© 


© 



is3i sixy 

36*0 h3'0 3T'0 



9 



« 



AXIS TEST 
0.12 0.24 



0.36 

H 
0.36 



36 '0 



fi3*0 31 '0 

is3i sixy 



« 



0.12 0.24 

AXIS TEST 



8 


si 


3>' - 


-• 3> 


X*- 


— X 


•xW 


ro<-i 


CO 


CO 


-4 


•H 


m 


n 


CO a 


»w 


-4. _ 


_• — f 


ro~ 


ro 


X 


-C 



CO CD 
CO 05 
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SAMPLE DATAPLOT OUTPUTS (Continued) 




Following is a sample of all alphanumerics and symbols that can be output using DATAPLOT. 

ABCDEFGHIJKLhNOPQRSTUVWXYZ0i2345B789 
CYJt-S »*$*&' 0*+,-./: ;<=>e 
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